Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
программа на языке pascal, успехов в учебе.
program pr;
var n,m,z,k,i,vm: integer;
begin
readln (n,m,z);
vm: =n*60+m;
i: =1;
while i< =vm do
k: =k+1;
i: =i+z;
end;
writeln (k);
readln;
end.
я пробовала у меня вышло 15 но возможны и другие варианты
десятичная двоичная восьмеричная шестнадцатиричная
1)
10 1010 12 a
18 10010 22 12
322 101000010 502 142
2)
10 1010
74 112
92 5c
числа снизу обозначают систему счисления
картинка должна быть в папке с программой и быть в формате bmp
usesgraphabc;
varn: string; b: picture; s: integer;
beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.
Популярные вопросы