Информатика, опубликовано 2018-08-22 22:01:39 by Гость
Вывести таблицу квадратов чётных чисел от 1 до 19. Условный оператор не использовать!
Ответ оставил Гость
Var a,bi: int64;
Begin
a:=2;
Repeat
b:=a×a;
Write(b, );
a:=a+2;
until a=18;
End.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.