45 ! нужно в паскале: ввести x,y если оба чётные числа. вывести на экран квадрат их суммы. заранее большое !
LUKARIN
3
18.09.2019 00:10
0
Другие вопросы по теме Информатика
вася784
26.04.2020 19:55
Apple8066
26.04.2020 19:54
vagiz7000
26.04.2020 19:54
Darina1110
26.04.2020 19:54
АНДРЕЙ22855555
26.04.2020 19:54
Лера240504
24.04.2020 10:58
Анастасия1708035
24.04.2020 10:59
Бллллллл
01.08.2019 12:30
карина2148
31.01.2021 13:06
Популярные вопросы
- Відомо що а більше в порівняйте ...
2 - Қуат көзі-источник энергии Өндір-производи Үнем-экономия Шығын-...
2 - Суреттерді өзара байланыстырып, әңгіме құра....
2 - Мне нужны краткие ответы на эти вопросы Вопросы по Песни про купца...
3 - -8×2/5:7= вычисление с объяснением...
1 - Два тела движущиеся навстречу друг другу со скоростями 2 МС и 4...
3 - Почему дубровский - охотничий роман...
3 - В.И.Лениннің өмірдерегін хронологиялық ретпен орналастыр....
3 - Күз мезгі туралы әңгілеме3сынып81бет...
1 - От 0 до 6-20 км Экзосфераот 6-20 до 50 КМстратосфераот 50 км до...
1
//Версия 3.3, сборка 1627
begin
var (x,y):=ReadInteger2;
if x.IsEven and y.IsEven then write((x+y)**2);
end.
var
x,y:integer;
begin
writeln('Введите x:');
readln(x);
writeln('Введите y:');
readln(y);
writeln(Sqr(x+y));
end.