1)напишите программу, которая получает с клавиатуры натуральное число и находит наибольшую цифру в его десятичной записи. 2)напишите программу, которая получает с клавиатуры натуральное число и определяет, есть ли в его десятичной записи одинаковые цифры, стоящие рядом. сделайте в паскале pascal
Рмирот
3
24.08.2019 03:40
5
Другие вопросы по теме Информатика
ксюша1647
20.04.2020 21:24
YungTrappa1
20.04.2020 21:25
11912
20.04.2020 21:26
anastasyaantonova07
09.04.2019 20:14
pavellolpanov
09.04.2019 20:16
kodraemail
09.04.2019 20:17
aleksandr17082004
03.09.2019 06:50
sol9
03.09.2019 06:50
сорин8888
21.05.2020 13:59
ivac6136
21.05.2020 14:00
Популярные вопросы
- Решите систему неравенств, 5 и 6 задание Если можно, то на бумаге и пришлите...
3 - ОДНА ЗАДАЧА ОЧЕНЬ НУЖНО ХЗ КАК РЕШАТЬ ЗАДАНИЕ С ТЕХА ПО ОХРАНЕ ТРУДА 15. 0.1...
2 - с тестом By the age of 6 she read and write well. cancan tcouldwere able toSarah...
3 - НУЖНО РАССКАЗАТЬ ПРО ЛЮБОЙ ВЕСЕНННИЙ ПРАЗДНИК В РОССИИ ПО ПЛАНУ, ПЛАН ОБОЗНАЧЕН...
3 - в Скоротіть дріб x^2+11x-12/x^2+14x^2+24x...
1 - 1.Укажіть групу речовин, яка містить лише оксиди.А) CuO, CuS, CO2; Б)NaOH,...
2 - Сравните свойства ацетилена и этилена , чем сходны чем отличаются можно в...
1 - РЕЮЯТА НУЖНА ВАША ВЫРУЧИТЕ УМОЛЯЮ(((((...
2 - Complete the sentences with too, too much/many, (not) enough, or very...
1 - В треугольнике ABC известно, что AB=12см, ВС=8см, а угол В=60 градусов. Найдите...
2
program odin;
uses crt;
var x,y,z:real;
begin
clrscr;
read(x);
y:=x mod 10;
z:=x div 10;
if y>z then
writeln(y)
else
writeln(z);
end.