Информатика, опубликовано 2018-08-22 23:29:53 by Гость
14. Составить алгоритм и написать решение задачи на Паскале: Сгенерировано целое число от 50 до 70. Найти его квадрат, если оно кратно 2 и куб, если оно кратно 3.
Ответ оставил Гость
Program n1;
var: a: integer;
begin
randomize;
a:=random(70-50+1)+50;
if(a mod 2=0) then do a:=a*a;
if(a mod 3=0) then do a:=a*a*a;
writeln(a);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.