Помогите срочно решить!!! Даю 20 балов

0 голосов
7 просмотров

Помогите срочно решить!!! Даю 20 балов


image

Информатика (14 баллов) | 7 просмотров
Дан 1 ответ
0 голосов

Ответ:

Смотри файл

Объяснение:

program z1;

var i,s:integer;

begin

s:=0;

for i:=10 to 99 do if i mod 7 = 0 then s:=s+i;

write (s)  

end.

(2.2k баллов)