Задание 1. Выберите основные данные, которые относятся к языку программированияPascal.Выберите несколько из 5 вариантов ответа: 1) Назван в честь Блеза Бейсика. 2) Появился в 1965 г. 3) Наибольшее рас получил с появлением микроЭВМ и персональных компьютеров. 4) Был создан в 1968 г. 5) Создатель языка – Никлаус Вирт. Задание 2.Что может входить в алфавит языка Pascal?Выберите несколько из 6 вариантов ответа: 1) Русские прописные буквы. 4) Русские строчные буквы. 2) Латинские строчные буквы. 5) Специальные символы. 3) Арабские цифры. 6) Латинские прописные буквы. Задание 3.Из каких элементов состоит структура программы языка Pascal? Выберите несколько из 5 вариантов ответа: 1) Тело программы. 4) Точка. 2) Раздел описания. 5) Раздел операторов. 3) Заголовок программы.
Ответы
Pascal
2)program crazyfrog;
uses crt;
var a: array [1..15] of integer; i,min: integer;
begin
for i:=1 to 15 do begin a[i]:=-30+random(40); writeln('случайные числа: ',a[i]);end;
a[1]:=min;
for i:=2 to 15 do begin if(a[i]>0) then begin if(a[i]<min) then min:=a[i] ;end;end;
writeln('min= ',min);
end.
3)program warcraft;
uses crt;
var a: array [1..10] of integer; i: integer;
begin
s:=0;
writeln('случайные числа');
for i:=1 to 10 do begin a[i]:=9+random(90); write(' ',a[i]);end;
for i:=1 to 10 do begin if(a[i] mod 2 <> 0) then s:=s+a[i];end;
writeln('сумма нечет чисел= ',s);
end.
2)program crazyfrog;
uses crt;
var a: array [1..15] of integer; i,min: integer;
begin
for i:=1 to 15 do begin a[i]:=-30+random(40); writeln('случайные числа: ',a[i]);end;
a[1]:=min;
for i:=2 to 15 do begin if(a[i]>0) then begin if(a[i]<min) then min:=a[i] ;end;end;
writeln('min= ',min);
end.
3)program warcraft;
uses crt;
var a: array [1..10] of integer; i: integer;
begin
s:=0;
writeln('случайные числа');
for i:=1 to 10 do begin a[i]:=9+random(90); write(' ',a[i]);end;
for i:=1 to 10 do begin if(a[i] mod 2 <> 0) then s:=s+a[i];end;
writeln('сумма нечет чисел= ',s);
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
2. Для кодирования одного значения требуется 20 бит, поэтому для кодирования всех значений в секунду требуется 44100×20 = 882000 бит
3. За 40 секунд потребуется объем в 40 раз больше:
40×882000 = 35280000 бит = 35280000/8 = 4410000 байт = 4410000/1024 ≈ 4306.64 Кбайт = 4306.64/1024 ≈ 4.2 Мбайт
4. Это расчет для одного канала. В стереофайле два канала, поэтому результат нужно удвоить, получая 8.4 Мбайт.