Регистрация
Амишка51
07.02.2021 01:52
Информатика
Есть ответ 👍

Дан программный код: program my3; var n: longint; a,с: integer; begin writeln ('введите двузначное число: '); readln(n); a: = n div 100; c: = n mod 10; if (a=7) or (c=7) then n: = n*n; write(n); end. каков результат работы программы при введении исходного числа n=17?

191
275
Посмотреть ответы 3

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

LizaZZ6
LizaZZ6
4,4(10 оценок)
Не можно было просто переписать код в паскаль?
iZANAVESKAi
iZANAVESKAi
4,4(9 оценок)
Результат будет равен 289
Maxxwell1
Maxxwell1
4,8(19 оценок)
Var       i, n, s: integer; begin       readln(n);       n : = n + (n + 1) mod 2;             for i : = 1 to 5 do       begin               s : = s + n;               n : = n + 2;       end;       writeln(s); end.

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