Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Irinazpopo
27.08.2021 19:39 •
Информатика
Написать програму вычесления площади и периметра прямоугольника , если извесна длина сторон a, b.(всё это дольжно выгледит програмай для паскаль adc)
Показать ответ
Ответ:
crystall5555
04.10.2020 21:31
Var
a,b,P,S:integer;
begin
writeln('Введите а и b');
read(a,b);
S:=a*b;
P:=(a+b)*2;
writeln('Периметр равен = ',P);
writeln('Площадь равна = ',S);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Qwer948
17.04.2021 08:57
Впроцессе преобразования растрового графического изображения количество цветов уменьшилось с 64 до 8. во сколько раз уменьшился объём, занимаемый им в памяти?...
kovalenko171019
14.05.2023 06:23
Информатика 7 класс нужно Постройте логическую схему, соответствующую логическому выражению, и найдите значение логического выражения: 1) F=AvB&¬C, если A=1, B=1, C=1. 2)...
Эвелина123412
24.11.2020 07:37
составить блок-схему!Program abc;Var i: integer;a, b: string;BeginWrite( Введите своё имя: );Readln(a);Write( Введите свою фамилию: );Readln(b);For i:=1 to 10 do writeln(a, ,...
Ушастый1209
13.07.2022 16:41
Тест по информатике (3 во...
Настя55251
01.01.2021 22:19
3. Ерте кезден ел аузында сақталған «Екі дос» әңгімесін тыңдап, негізгі идеясынайтыңдар. Мәтіндегі фразеологизмді синонимімен алмастырыңдар....
Degradant81
13.02.2022 06:12
Рысь - крупная и опасная лесная кошка.(рысь - подлежащее , кошка - сказуемое) Поэзия - это душа подвига , обращающего красоту в добро. (поэзия - подлежащее , душа - сказуемое)...
kovalcuk
29.11.2021 23:44
Запиши верные варианты ответа Укажи другое обозначение отрезков 1) EF и 2)MN и 3)AK и...
aaaaa123456789p
29.11.2021 23:44
2.32. Закончите уравнения реакций горения, расставьте коэффици, енты: а) P+02- в) С+ 02- б) S + O2- г) Fe + O2-...
SofiaLimon
29.11.2021 23:44
. Дано: вектор а(2;4) , вектор в(3; 6) , вектор с(-1; -4) Найти: координаты векторов: а+в; в-с....
Masanet
17.05.2020 05:47
Запишіть рівняння реакцій за схемою: алюміній карбід→метан→хлорометан→дихлорометан →трихлорометан. Вкажіть умови реакцій і суму коефіцієнтів за кожним рівнянням....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,P,S:integer;
begin
writeln('Введите а и b');
read(a,b);
S:=a*b;
P:=(a+b)*2;
writeln('Периметр равен = ',P);
writeln('Площадь равна = ',S);
end.