Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
caps lock,shift
№1. программа на паскале
program xxx;
var n : integer;
x : array[1..10] of integer;
begin
for n: =1 to 10 do
x[n]: =sqr(n) + 5;
wreteln('последовательность х: ')
write(x[i]);
readln
end.
var
d1,d2,d3,d4: string;
randomize;
readln(d1);
readln(d2);
readln(d3);
readln(d4);
case random(4) of
0: writeln(d1,d2,d3);
1: writeln(d1,d2,d4);
2: writeln(d2,d3,d4);
3: writeln(d1,d3,d4);
end;
одновременно нажать alt и 3 (на цифровой клавиатуре с права)
♥
Популярные вопросы