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

Ответы

арс90 06.07.2020 19:28

Как на счет
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.

ПОКАЗАТЬ ОТВЕТЫ

Другие вопросы по теме Информатика

Oxxxy502 30.10.2020 07:56

Как расшифровать аббревиатуру СКИ...

Кошка022 30.10.2020 07:56

АнимешкаПельмешка 12.06.2019 04:30

Лана200611 07.10.2019 11:40

vityabro13 07.10.2019 11:40

Дарьяпоможет 07.10.2019 11:40

лунный3 01.04.2020 21:28

Как изменить текст в метке??...

BlazeySpace01 01.04.2020 21:28

filltema 16.05.2021 00:08

Stepan0305 14.05.2020 14:35

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