Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ответ:знаю только первые 2
Объяснение джойстик, монитор.
1.джойстик
2.монитор
3.файл
4.колонки
5.процессор
6.мышь
7.дискета
8.принтер
9.диск
10.вебкамера
11.клавиатура
program kvadrat;
var i : integer;
begin
for i: = 10 to 100 do
writeln ( i: 2, i*i : 5);
readln;
end.
program xxx;
var i, n : integer
d : array[1..30] of real;
write ('введите разметность массива n=');
readln(n);
writeln(''введите элементы массива d: ');
for i: =1 to n do
readln(d[i]);
writeln ('исходный массив d: ');
write(d[i]);
if d[i] mod 3 = 0 then d[i]: = 2 * d[i];
writeln ('полученный массив d: ');
readln
Популярные вопросы