Написать программу, которая определяет значение целочисленной переменной A, после выполнения фрагмента алгоритма:A:=247;В:=(Аdiv 100) 10-9А:=(10*b-a) mod 10;

Question

Написать программу, которая определяет значение целочисленной переменной A, после выполнения фрагмента алгоритма:A:=247;В:=(Аdiv 100) 10-9А:=(10*b-a) mod 10;

Написать программу, которая определяет значение целочисленной переменной A, после выполнения фрагмента алгоритма: A:=247; В:=(А*div 100) * 10-9 А:=(10*b-a) mod 10;

Гость

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

Accepted Answer

Как на счет Program sk; var A,B:integer; begin A:=247; B:=(A div 100) * 10-9; A:=(10*B-A) mod 10; writeln('A= ',A); end.

Написать программу, которая определяет значение целочисленной переменной A, после выполнения фрагмента алгоритма:A:=247;В:=(А*div 100) * 10-9А:=(10*b-a) mod 10;

Написать программу, которая определяет значение целочисленной переменной A, после выполнения фрагмента алгоритма:A:=247;В:=(Аdiv 100) 10-9А:=(10*b-a) mod 10;