Дана цена 1кг кофе. Вывести на экран стоимость 1.1, 1.2,..,2 кг кофе

@Ilya158 · Регистрация: 29.11.2017

Студворк — интернет-сервис помощи студентам

@ZX Spectrum-128 · 17.12.2017, 17:18

Pascal

var
  c, t, n: Real;
 
begin
  Write('Введите цену за кг кофе: ');
  Readln(c);
  t := 1.0;
  while t <= 2 do
  begin
    n := c * t;
    Writeln('Цена при ', t, ' кг равна: ', n);
    t := t + 0.1;
  end;
end.

Подглядел тут:
Дано вещественное число - цена 1 кг конфет. Вывести стоимость 0.1,0.2, .1 кг конфет

@Ilya158 0 / 0 / 0 Регистрация: 29.11.2017 Сообщений: 23
		1
	Дана цена 1кг кофе. Вывести на экран стоимость 1.1, 1.2,..,2 кг кофе 17.12.2017, 16:41. Показов 2488. Ответов 1 Метки нет (Все метки) Дана цена 1кг кофе. Вывести на экран стоимость 1.1, 1.2,..,2 кг кофе 0

Опции темы

Дана цена 1кг кофе. Вывести на экран стоимость 1.1, 1.2,..,2 кг кофе

Решение