Предмет: Информатика,
автор: molodichenkonm
ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Составьте программы к блок-схемам.
Приложения:

Аноним:
неправильная блок схема
Ответы
Автор ответа:
1
5.
program scheme;
var y,i,x:integer;
begin
y:= 0;
for i:= 1 to 10 do
begin
readln(x);
if x mod 2 = 0 then
y:=x+y;
end;
writeln(y);
end.
program scheme;
var y,i,x:integer;
begin
y:= 0;
for i:= 1 to 10 do
begin
readln(x);
if x mod 2 <> 0 then
y:=y+1;
end;
writeln(y);
end.
Интересные вопросы
Предмет: Психология,
автор: mariyavasiliv8
Предмет: Биология,
автор: semdrom2001
Предмет: Физика,
автор: hrgehe3
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: horoschenki