Супер современные компьютеры возможно в будущем смогут всё! Если учёные создадут супер гравику то тогда 3д фильмы мы будем смотреть на компьютере! Компьютер коврик. А что? Тоже возможно посидел дома за компьютерным столиком, скрутил ( как ковёр ) и перетащил на кухню. Техника развивается, и вскоре учёные смогут добиться всего этого!
Для начала складываем 4+8 и получаем 12 или по 5 горшков.
А потом меняем большие горшки на маленькие.
Один большой равен двум маленьким и наоборот два маленьких равны одному большому.
P.S.:ну во как-то так.думаю что ты поймешь)))
//PascalABC.Net 3.2
begin
var time:=readinteger('Введите время суток: ');
if time in [0..5] then write ('Ночь')
else if time in [6..11] then write ('Утро')
else if time in [12..18] then write ('День')
else write ('Вечер');
end.
Javascript:var X=parseFloat(prompt()),S=10,собрали=0;for(var год=0;год<5;год++){собрали+=X*10-2;X+=X*0.07;}alert(собрали);
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!
procedure Foo;
begin
var k:integer;
Read(k);
if k<>0 then begin Foo; Print(k) end
end;
begin
Foo;
end.