Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 05:54
1031
Написать задачи на языке Pascal:1. Возвести число в квадрат.
2. Даны три числа. Найти среднее арифметическое трех чисел.
3. Найти значение выражения y=8*x
(лучше чтобы это работало на Linux)
1
ответ
Ответ: Компилятор PascalABC.NET
1) var a,v: integer;
begin
writeln('a'); readln(a); v:=a*a;
writeln(v); end.
2) var a,b,c, v: real;
begin
writeln('a'); readln(a);writeln('b'); readln(b);writeln('c'); readln(c);
v:=(a+b+c)/3;
writeln(v); end.
3)var v,y: integer;
begin
writeln('y'); readln(y); v:=8*y;
writeln(v); end.
1) var a,v: integer;
begin
writeln('a'); readln(a); v:=a*a;
writeln(v); end.
2) var a,b,c, v: real;
begin
writeln('a'); readln(a);writeln('b'); readln(b);writeln('c'); readln(c);
v:=(a+b+c)/3;
writeln(v); end.
3)var v,y: integer;
begin
writeln('y'); readln(y); v:=8*y;
writeln(v); end.
0
·
Хороший ответ
4 апреля 2023 05:54
Остались вопросы?
Еще вопросы по категории Информатика
История структурное программирование...
Какое значение имеет хранение информации для всего человечества? Для отдельного человека?...
Алфавит некоторой знаковой системы состоит из 256 символов. Какое количество информации будет содержать предложение из 40 символов? Ответ записать в б...
Состояние, в котором пользователь находится или находился Отдельно взятое сообщение в форуме, в какой-то теме Законопослушный пользователь в соц. сет...
Почему при работе за компьютером необходимо соблюдать правила техники безопастности? какие требования правил техники безопасности являються , по вшему...