Св паскале ( не сложная) : каждые 3 часа моллюск делится на 2, сколько их будет через n часов? обратите внимание на то, что число часов может и с остатком делится на program molusk; var s,n,i: integer; begin; n: =1; writeln('введите время '); readln(s); for i: =1 to s do if(s mod 3)=3 then n: =s: 3; writeln(n); end. где у меня тут ошибка, думаю скорее всего в
farita1
2
09.08.2019 16:20
0
Другие вопросы по теме Информатика
Vlab36534
17.05.2021 20:21
lubas143
27.02.2019 12:00
DenQ04a
27.02.2019 11:10
maks722
27.02.2019 11:10
dogs2247
27.02.2019 10:00
надя653
27.02.2019 10:00
18alena2002
27.02.2019 09:50
умняшка220
27.02.2019 09:50
Популярные вопросы
- (6) 1. «Төрт сөйлем» тәсілі арқылы әңгіме туралы пікірлеріңді білдіріңдер:...
3 - Какие рекриационные ресурсы в Канаде...
2 - Відділ доставки піци отримує замовлення - на фірмову піцу та їнші....
3 - Знайдіть корені рівняння:(12у+18) (1.6-0.2у)=0...
1 - -5 целих 1/7:(х+1 целая 3/10)=2 целих 1/7 к/р просто...
2 - F2/f1=s2/s1 формула чего и что означают буквы...
3 - Среди учеников 5-го класса, ходящих на «Физматик», на математику...
2 - . Яким чином Октавіан позбавився Лепіда? * За наказом Октавіана Лепід...
2 - знайдіть центр кола на осі Оу , якщо відомо що коло проходить через...
1 - Розвязати рівняння (х2+1)2-10(х2+1)+25=0...
2
var
molusk, n, i: integer;
begin;
molusk := 1;
Writeln('введите время ');
readln(n);
for i := 1 to n do
if i mod 3 = 0 then
molusk := 2 * molusk;
writeln(molusk);
end.