Задача в Паскаль

Статус
В этой теме нельзя размещать новые ответы.

DRIVE37

Пользователь
Регистрация
12 Июн 2017
Сообщения
0
Симпатии
0
Пол
Мужской
Здравствуйте, помогите пожалуйста кто разбирается в Паскаль, задача такова:

"Задача."

Создайте программу на языке паскаль используя цикл While.
 
Последнее редактирование:

Rey

Пользователь
Регистрация
27 Ноя 2018
Сообщения
58
Симпатии
50
как то так должно быть xD
pascal:
var
  t: integer;

begin
  t := 0; //0 тарелок изначально
  while t <= 58 do  // выполнять пока тарелок не будет 58
  begin
    t := t + 2; //помыли 2 тарелки и прибавили
  end;
  writeln('4istih tarelok ', t); // сообщаем что помыто 60 тарелок
  readln
end.
как то так должно быть xD
pascal:
var
  t: integer;

begin
  t := 0; //0 тарелок изначально
  while t <= 58 do  // выполнять пока тарелок не будет 58
  begin
    t := t + 2; //помыли 2 тарелки и прибавили
  end;
  writeln('4istih tarelok ', t); // сообщаем что помыто 60 тарелок
  readln
end.
1590217537417.png
 
Последнее редактирование:

Mmonster

Пользователь
Регистрация
9 Июн 2017
Сообщения
604
Симпатии
294
Предупреждения
15
Пол
Мужской

DRIVE37

Пользователь
Регистрация
12 Июн 2017
Сообщения
0
Симпатии
0
Пол
Мужской
Rey, спасибо большое!
 
Статус
В этой теме нельзя размещать новые ответы.
Сверху Снизу