Предмет: Информатика,
автор: lvolobuev49
Найти паскаль, больше не чего не надо
Приложения:
Ответы
Автор ответа:
0
Ответ:
pascal
Объяснение:
var
s, k: integer;
begin
s := 0;
k := 0;
while k < 6 do
begin
s := s + 2;
k := k + 1;
end;
WriteLn('s = ', s);
end.
Интересные вопросы
Предмет: Английский язык,
автор: polinayakynina
Предмет: Другие предметы,
автор: aleexborisow
Предмет: Русский язык,
автор: erik669vor
Предмет: Литература,
автор: dashamilashka21
Предмет: История,
автор: PolinaMi86