tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить алгоритм и программу.
Составить алгоритм и программу. дано 2 числа. вычислить их сумму. если она превышает 1000, то вычислить и напечатать квадрат первого числа. в противном случае – квадрат второго.
vovkahooligan
1 29.03.2019 12:30
0
Ответы
zarina20178
07.06.2020 04:26
var a,b:integer;
begin
readln(a,b);
if (a+b)>1000 then writeln(sqr(a)) else writeln(sqr(b));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Divas888
16.04.2022 23:00
Написати програму, яка запитує в користувача спад напруги на резисторі та величину його опору та виводить на екран силу струму який протікає через резистор....
Topskiy13
16.04.2022 22:17
из бревна вырезают балку наибольшей площади. Найдите размеры сечения балки, если известен радиус сечения бревна. Оформите решение в виде компьютерной программы....
vovaaan1
16.04.2022 22:15
ЗА КРОССВОРД Нужно составить КРОССВОРД из 30 слов на тему информатика, программирование...
theslomsmon
16.04.2022 22:03
Кто получит автомат ? ЯЗЫК СИ В Алтайском государственном техническом университете студенты получают оценки по стобальной шкале, то есть от нуля до ста. Преподаватель Павел...
laura35
03.09.2020 20:54
Плюсы и минусы резервного копирования? Заранее...
cvetok555
03.09.2020 20:53
Какие программные средства и технологии обработки информации (текстовой, графической и т.д.) вам известны?...
Sa4eR
12.03.2021 14:32
Напишите программу для вычисления значения выражения: ...
ьпоаь1
12.03.2021 14:31
Олимпиада по информатике и роботехнике...
кристина1423
12.03.2021 14:30
ответить хотя бы на пару вопросов...
Nobd
19.08.2019 12:40
Нужно составить на языке программирования паскаль: заполнить линейный массив а(10) по формуле a[i]: =i2 /2 и вывести на экран девятый элемент....
Популярные вопросы
Договоры серии СНВ , основное положение и их анализ с точки зрения интересов...
3
Юля задумала число:2/5 его составляет 1/3 от числа 360.Какое число задумала...
3
при каких значениях a уровнение не имеет решений ?...
3
по труду нужно выбрать один вид и написать сообщение. На темы: декоративные...
1
3.Насколько удлинится пружина под действием силы 3,0 кН. если жесткость...
2
Y-4/7y=1 2/5 решите (с объяснением, не просто ответ)...
2
Напишите процессы, протекающие при электролизе водных растворов: Sr(NO3)2,...
1
Какой субъект Федерации граничит с Казахстаном? Ставропольский край Ульяновская...
1
Перед финансистом стоит профессиональнач задача Определить что относится...
1
РЕШИТЕ ! Сколько килограммов угля необходимо что бы испарить куб льда объёмом...
1
var a,b:integer;
begin
readln(a,b);
if (a+b)>1000 then writeln(sqr(a)) else writeln(sqr(b));
end.