1. определить значения целочисленной переменной s после выполнения алгоритмов: a). s: =1, a: =1 для i от 1 до 3 повторять нц s: =s+ix(i+1)a a: =a+2 кц (составьте блок-схему), б). для i от 1 до 3 повторять нц s: =0 для j от 2 до 2 повторять нц s: =i+j кц кц (составить блок-схему) 2). последовательно вводятся n целых чисел. найти максимальное из них.

derver derver    1   02.06.2019 12:30    6

Ответы
варя388 варя388  03.07.2020 08:52
1.
var s,a,i:integer;
begin
s:=1;i:=1;
for i:=1 to 3 do
s:=s+i*(i+1);
a:=a+2;
writeln (S,' ',a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика