abagvandmip0agkq
02.05.2023 00:23

40 вычислить и вывести все значения y по формуле y=4-x для всех целых значений x от 1 до n.! причина

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
sot58
14.06.2020 05:16

program raf105;

var x,y,n,i: integer;

begin

write('n = ');

readln(n);

for i:=1 to n do

begin

 x:= i;

 y:= 4-x;

 writeln(i:2,'.  x=',x:2,'  y=',y:2);

end;

end.

PascalABC 3.4.2
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота