Регистрация
Aidana1620
24.07.2020 18:32
Информатика
Есть ответ 👍

, завтра у меня экзамен, а я нифига не понимаю...​

276
422
Посмотреть ответы 1

Ответы на вопрос:

Kurakluk
Kurakluk
4,4(53 оценок)

Вот, теперь программа работает, убрал комментарии. Ещё добавил скришот работы:

Program prim1;Var i, n, p1, p2, s: integer;Beginwriteln ('vvedite chislo n');readln (n);for i:= 10 to 99 do beginp1:= i div 10;p2:= i mod 10;s:= p1+p2;if s=n then writeln ('i=', i);end;readln;end.
Program prim1; Var i, n, p1, p2, s: integer; Begin writeln (‘vvedite chislo n’); readln (n); {органи

Популярно: Информатика