1. Информатика
  2. Написать программу Паскаль.Даны

Написать программу Паскаль.Даны два положительных числа.Если квадрат первого числа меньше 28,то второе число увеличить на 12.Вывести результат.

makslazarev201 makslazarev201    2   22.04.2020 08:00    2

Ответы
kleep9007катя kleep9007катя  13.10.2020 15:47

program n1;

var  

a, b :integer;

begin

read(a, b);

if not(sqr(a)>28) then

writeln(b+12)

else writeln(sqr(a));

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sssmak1 sssmak1  14.07.2019 20:40
Молю просто руки целовать буду нужно по информатике написать письмо делу морозу в котором есть инверсия, конъюнкция и дизъюнкция...
НаСтЯ5856 НаСтЯ5856  14.07.2019 20:40
Заполните 7 строк электронной таблицы ms excel, имеющей следую-щие поля: фамилия абонента цена за минуту разговора время звонка создать программу vba, рассчитывающую стоимость...
leprekon1999ku leprekon1999ku  10.12.2020 16:09
Рис. 3.48 Задание 8. Исходное положение Робота показано на ри-сунке 3.49. Где-то справа от Робота есть закрашеннаяклетка (расстояние до клетки может быть различным).Составьте...
иришка276 иришка276  10.12.2020 16:09
1.Как вы думаете, какая модель точнее описывает ситуацию в системе массового обслуживания: детерминированная или вероятностная? Обоснуйте свой ответ. 2.Как моделируются случайные...
smolekovmax smolekovmax  10.12.2020 16:09
1. Видеопамять компьютера имеет объем 512Кб, разрешение экрана 640*200, в палитре 16 цветов. Какое количество страниц экрана может одновременно разместиться в видеопамяти компьютера...
gigeriti28391vlad gigeriti28391vlad  10.12.2020 16:10
Задачи на циклы в Python: 1. Дано целое число N ( 0). Найти значение выражения 1.1 – 1.2 + 1.3 – … (N слагаемых, знаки чередуются). Условный оператор не использовать. 2. Дано...
almikhaylova almikhaylova  10.12.2020 16:10
Задачи на циклы в Python: 1. Дано вещественное число Price, являющееся ценой одного килограмма конфет, вывести цену 2,3,4,5….10 кг конфет 2. Дано вещественное число Price,...
nasibyannn nasibyannn  16.04.2020 18:49
Вычисли сумму чисел в MS Excel. 1. 276; 25; 1535; 55,2 2. 276; 25; 1535; 55,2; 42,9...
imam1707 imam1707  16.04.2020 19:14
Задание 5 Во Компьютерные словари выполняют перевод ... Для перевода текстовых документов применяются ... Выберите один из 3 вариантов ответа: 1) только слов программы-переводчики...
Enweys Enweys  16.04.2020 19:15
Составить схему алгоритма z=x 3 /y, где у = sin(x)+0,5. Вычислительный процесс описывается следующей условной формулой: Z = {вычислить z=x 3 /y, если у ≠ 0 вывести у=0 , если...

Популярные вопросы