Лучшие помощники
- Megamozg 2170 б
- Matalya1 1800 б
- DevAdmin 1685 б
- arkasha_bortnikov 775 б
- Dwayne_Johnson 755 б
3 апреля 2023 02:02
846
Написать задачи на языке 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
·
Хороший ответ
5 апреля 2023 02:02
Остались вопросы?
Еще вопросы по категории Информатика
Какой ученый разработал основы алгебры логики?  1.Л. Пастер  2.Дж. Буль  3.Б. Паскаль 4. К. Шеннон  5.И. Ньютон...
1. Что такое программное обеспечение ЭВМ? 2.Какие задачи выполняет прикладное программное обеспечение? 3.Назовите основные виды прикладных программ...
Постройте деревья, соответствующие следующим арифметическим выражениям: 1) (a+b)*(c+2*d) 2) (2*a-3*d)*c+2*b 3) (a+b+2*c)*d 4) 3*a-(2*b+c)*d...
в бутылке стакане кувшине и банке находятся молоко лимонад квас и вода известно что вода и молоко не в бутылке сосуд с лимонадом стоит между кувшином...
Даны массивы A(m) и B(m), m10. Сформировать массив C по правилу:
C1 =A1-B1, C2=A2+B2, C3=A3-B3 и т.д. Вывести на печать исходные массивы
A и...