Паскаль! с использованием цикла while (без цикла - вопрос №6444432 от Keks5478568 13.03.2023 23:29

Question

Информатика: Паскаль! с использованием цикла while (без цикла for) малыш и карлсон живут в прямоугольной комнате длиной а метров и шириной в метров. сколько им понадобится квадратных ковриков со стороной с метров, чтобы полностью покрыть пол комнаты? (малыш и карлсон не знают операции деления и умножения).

Keks5478568 · Answer

var A,B,C,S1,S2,k,i:integer;beginwrite( A, B, C: );readln(A,B,C);S1:=0;while A S1 do  begink:=k+1;S1:=S1+C;end;S2:=0;while B S2 do  begini:=i+1;S2:=S2+C;end;k:=k*i;writeln( k = ,k);end....