Предмет: Информатика,
автор: Kissru78
Составить программу на языке программирования Turbo Pascal и зарисовать блок-схему для следующей задачи: запросить некоторое целое число А, если вдруг окажется, что точно больше 10, то вывести "Слишком много!", а если меньше 10, то удвоить данное число
Ответы
Автор ответа:
0
var a: real;
begin
write('Введите число: ');
read(a);
if a > 10 then
writeln('Слишком много!')
else
a := a * 2;
end.
begin
write('Введите число: ');
read(a);
if a > 10 then
writeln('Слишком много!')
else
a := a * 2;
end.
Интересные вопросы
Предмет: Русский язык,
автор: arianatrusova275
Предмет: Алгебра,
автор: Exilexx
Предмет: Математика,
автор: Аноним
Предмет: Алгебра,
автор: vishua
Предмет: Физика,
автор: xavihernandez