РЕБЯТКИ, СРОЧНО, ПРОШУ! Информатика, решить с циклом "For" УМОЛЯЮ!!! Дам 60 баллов.

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

РЕБЯТКИ, СРОЧНО, ПРОШУ! Информатика, решить с циклом "For" УМОЛЯЮ!!! Дам 60 баллов.


image

Информатика (87 баллов) | 32 просмотров
0

Язык?

Дан 1 ответ
0 голосов

Var
d,c:integer;
Begin
c:=1;
Writeln('В 1 день количество заболевших составляет 1');
for d:=2 to 5 do begin
c:=c+c*3;
Writeln('В ', d , ' день количество заболевших составляет ', c );
end;
end.

(30 баллов)
0

Что такое d и c?

0

И откуда взялось B?

0

Срочно, ответь пожалуйста.

0

Блин, скажи пожалуйста, что такое d, c и B?