tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу вычисления
Составить программу вычисления площади и периметра квадрата на языке паскаль
UskovaV99
3 21.09.2019 03:20
0
Ответы
Зефирка78
04.08.2020 13:03
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var a:=ReadReal;
write('S=',a*a,'; P=',4*a);
end.
ПОКАЗАТЬ ОТВЕТЫ
moonlight121
04.08.2020 13:03
Program SP;
var a, s, p: real;
begin
readln(a);
s:=sqr(a);
p:=4.0*a;
wrineln(s, ' ', p)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
raykyoko
16.12.2021 18:40
Разделите 100100110/11001 по информатике...
semenshchiptso
16.12.2021 18:38
Язык СИ. Задана матрица целых чисел A(n ×m). Сформировать массив B(m), каждый элемент которого равен количеству положительных чисел с суммой цифр, кратной трём в соответствующем...
GizziMix2007
30.11.2021 17:01
познания окружающего мира восемь ответов ЛЮДИ ОЧЕНЬ...
Юролика
30.11.2021 17:01
Кто сможет сделать этот рисунок и скинуть на почту [email protected],сохранить в ворд 2003...
arinabesan6
27.04.2020 19:15
Таблицы истинности логических функцийРебят не шарю...
tjumentseva20031
27.04.2020 19:15
1) Переведите 51 Кб в байты. 2) Переведите 6 Мб в байты. 3) Переведите 32 Кб в биты. 4) Переведите 67198958 бит в Мб, ответ округлите до сотых 5) Вычислите, сколько бит в данном...
bolshikov
14.05.2020 12:05
Определите цель использования цифр 1 и 2 в следующем предложении 1. клавиатура, сканер, мышь 2. монитор, принтер...
diksimail
23.02.2021 20:27
Що б ти запитав у пошуковій системі...
криссть111
10.06.2019 08:20
Вслове фургон сколько букв и звуков...
Тупой2111
10.06.2019 08:20
Впрямоугольнике abcd биссектриса угла а пересекает сторону вс в точке о. докажите,что треугольник аво равнобедренный....
Популярные вопросы
Сочинение на тему: которую мне рассказала мама (бабушка, дедушка или папа) которая...
3
Начерти прямоугольник длиной 9 см а ширина в 3 раза меньше длины вычисли его...
3
32+32: 16+32: 2 24+320: 80*5 (29+99: 11): 2...
3
Решить эту с уравнения: в автопарке было 120 легковых автомобилей.грузовые составляли...
1
Чи правильно: доповідач виголосив промову...
3
Определите аналитически,пересекается ли график функции y=||x-1|-1| с прямой y=1...
2
Що зайве серед обов язкових ознак злочину? а) діяння, передбачене кримінальним...
2
Сказочные герои в операх н.а.римского-корсакова...
3
Решить 1 ab диаметр окружности bc хорда угол cob=42 градуса найти угол aoc 2...
3
Казахстан по отношению к нулевому меридиану...
1
//Версия 3.3, сборка 1634
begin
var a:=ReadReal;
write('S=',a*a,'; P=',4*a);
end.
var a, s, p: real;
begin
readln(a);
s:=sqr(a);
p:=4.0*a;
wrineln(s, ' ', p)
end.