В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
sonya0013
sonya0013
16.07.2021 03:17 •  Информатика

Написать программы на паскале ​


Написать программы на паскале ​

Показать ответ
Ответ:
Five1111
Five1111
28.11.2020 17:43

1)

var

m: integer;

begin

read(m);

writeln(m, 'кг=', m div 1000, 'тонна');

end.

2)

var

l: integer;

begin

read(l);

writeln(l, 'см = ', l div 100, 'м и ', l mod 100, 'см');

end.

3)

var

a, n: integer;

begin

read(a, n);

writeln('Получил каждый по: ', n div a);

writeln('Осталось: ', n mod a);

end.

4)

var

s: integer;

begin

read(s);

writeln(s, ' секунд = ', s div 60, ' мин. и ', s mod 60, ' сек.');

end.

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