Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
27 декабря 2022 10:57
1015
Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько будет амеб через 3,6,9,12, .... 24 часа (pascal)
1
ответ
program fofgogjoj;
var
amebi:integer;
i:integer;
begin
amebi:=1;
for i:=1 to 24 do
begin
if i mod 3 = 0 then
begin
Write('Время ',i,' ');
amebi:=amebi*2;
Write('Амебы ',amebi);
writeln;
end;
end;
end.
var
amebi:integer;
i:integer;
begin
amebi:=1;
for i:=1 to 24 do
begin
if i mod 3 = 0 then
begin
Write('Время ',i,' ');
amebi:=amebi*2;
Write('Амебы ',amebi);
writeln;
end;
end;
end.
0
·
Хороший ответ
29 декабря 2022 10:57
Остались вопросы?
Еще вопросы по категории Информатика
На рисунке изображена схема дорог Н-ского района, кроме графа, представлена информация о протяженности дорог в виде таблицы. Таблицу и граф создавали...
Петя скачивал файл со скоростью 218 бит/с, а затем передавал его Ване со скоростью 220 бит/с. На передачу файла Петя потратил 16 секунд. Сколько секун...
В основу эффективного решения головоломки «Ханойская башня» положен алгоритм, суть которого сводится к следующему: для перемещения башни, состоящей и...
В кокой строке единицы измерения информации расположены по возрастанию а) гигабайт мегабайт килобайт байт бит б)бит байт мегабайт килобайт гигабайт в)...
Три учительницы -Ирина Васильева, Дарья Михайловна, София Петровна- преподают химию, биологию и физику в школах Ярославля, Владимира и Краснодара. изв...