Информатика, опубликовано 09.01.2019 16:01
, ! Паскаль, все в одной программе: Дано число: 1) проверить является ли оно трехзначным 2)является ли оно нечетным 3)равны ли его 1 и последняя цифра
Если число не трехзначное, 2 и 3 пункт не должны срабатывать.
Ответы
Ответ оставил: Гость
Program name; var a : integer; begin read(a); if (a div 100 > 0) and (a div 1000 = 0) then if (a mod 2 = 0) then if a div 100 = a mod 10 then write('ok'); end.Ответ оставил: Гость
1080в квадрате*16*50*45*20Ответ оставил: Гость
Просто чертешь и все сейчас Скину как надоОтвет оставил: Гость
Поставь на роутер новый пароль и запиши его на телефон или позвони оператору данной компании
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
