Ответы
Ответ дал:
0
напишу на паскале
var a:longint;
begin
read(a);
a:= a div 5;
writeln(a*4);
end.
var a:longint;
begin
read(a);
a:= a div 5;
writeln(a*4);
end.
Ответ дал:
0
если не ошибаюсь, то мне нужен С++
Ответ дал:
0
нет, это не С++, а Pascal
Ответ дал:
0
я поняла, а выполнение этого задания возможно на С++
Ответ дал:
0
C++ у меня не установлен на компьютере. Требуемый язык программирования лучше сразу писать в тексте задания.
Ответ дал:
0
ладненько, и на этом спасибо
Ответ дал:
0
var
n, k, a, i: Integer;
begin
Write ('Введите первоначальное количество клеток грибов: ');
Readln (k);
Write ('Введите количество минут: ');
Readln (n);
a := n div 5; // вычислить количество целых пятиминуток
for i := 1 to a do begin // цикл выполняющийся столько раз, сколько пятиминуток
k := k * 4; // деление клеток - увеличение в 4 раза
end;
WriteLn ('Конечное количество клеток = ' + IntToStr (k));
end;
Вас заинтересует
2 года назад
2 года назад
3 года назад
3 года назад
9 лет назад
9 лет назад
10 лет назад
10 лет назад