Лучшие помощники
- Megamozg 2205 б
 - Matalya1 1800 б
 - DevAdmin 1720 б
 - arkasha_bortnikov 900 б
 - Dwayne_Johnson 870 б
 
2 апреля 2023 05:54
 874
 Написать задачи на языке 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
Остались вопросы?
 Еще вопросы по категории Информатика
 
                                    Помогите пожалуйста!!!!! Нужно написать программу в Паскаль, чтобы на экран выводился квадрат из звездочек....
                                
                                    Определи значение переменной kk после выполнения фрагмента программы:  i := 2;  k := 2;  while i   k := k * 2;  i := i + 1;  end;...
                                
                                    Для чего придназначены системы программирования...
                                
                                    Помогите, очень срочно как нарисовать ракету в паскале ABC...
                                
                                    Приведите примеры непрерывных и дискретных сигналов...