Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
компьютер входит в состав технической системы.
компьютер является надсистемой для ос.
program xxx;
var i, n, s : integer;
begin
write('введите число n=');
readln(n);
s: =0;
i: =2;
while i< =n do
s: =s+i;
i: =i+2
end;
write('сумма четных чисел =', s);
readln
end.
vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.
var s1, s2: string;
begin writeln('введите строку'); readln(s1); writeln('введите слово'); readln(s2); writeln('позиция слова в строке'); writeln(pos(s2, s1)); end.
Популярные вопросы