Страница 156 §3.4 номер 14, ГДЗ по информатике за 8 класс к учебнику Босовой

Информатика 8 класс 8класс ГДЗ к учебнику по информатике за 8 класс Босовой. Решения к номерам

Ответ и решение

program z14;var cislo:integer; st:string; begin write('Введи cislo>'); readln(cislo); cislo:=cislo mod 7; if cislo=3 then st:='Понедельник'; if cislo=4 then st:='Вторник'; if cislo=5 then st:='Среда'; if cislo=6 then st:='Четверг'; if cislo=0 then st:='Пятница'; if cislo=1 then st:='Суббота'; if cislo=2 then st:='Воскресенье'; writeln(st); end.