Предмет: Русский язык, автор: kotik47

помогите пожайлуста!.

Приложения:

Ответы

Автор ответа: Nika005191
0
Так надо было сделать или как???
Приложения:
Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Физика, автор: kudya2010
7 клас физика срочноооо пж Визначте ціну поділки шкали приладів ​
1 год назад
Предмет: Математика, автор: anarkulovaajsezim36
решите уравнение
(х+24,3):8,3=3,1​
1 год назад
Предмет: Українська мова, автор: mariastorozik20
срочно помогите пж даю 25 балов ​
1 год назад
Предмет: Английский язык, автор: zhanara2131
Помогите перевести текст пожалуйста
7 лет назад
Предмет: Другие предметы, автор: Mickey1337094
Разобрать программу по строкам. С клавиатуры вводится число 519. В ответе написать результат выполнения программы (что будет выведено на экран)
 
 
program a10;
var k, r, d: integer;
begin
read(k);
if k mod 3=0 then
begin
d:=d+7;
k:=k-d*2;
writeln(k:5, d:5);
end
else
writeln(d:5);
d:=d+4;
writeln(k:5, r:5);
readln
end.
7 лет назад