Помогите пожалуйста)по информатике Pascal abc 1)Составьте программку , которая выводит на

Помогите пожалуйста)по информатике Pascal abc
1)Составьте программу , которая выводит на экран число X,которое меняется от 1 до 10 и значения выражения(x+x)^2
2)Составьте программку , которая выводит на экран все числа от 20 до 50,заканчивающиеся на цифру 6.

Задать свой вопрос
1 ответ
Program asd;
Uses crt;
Var x,a:integer;
begin
For x:=1 to 10 do
begin
a:=sqr(sqrt(x)+sqrt(x));
writeln (a);
end;
end.

2.
Program asd;
Uses crt;
Var x:integer;
Begin
For x:=20 to 50 do
if x mod 10=6
then writeln (x);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт